Top 10k strings from Casino Royal (1984)(Oxford Computer Publishing)(Side A).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TZX] /

Back to the directory listing

   3         """"            
   3                         
   2 M$(N,Q)/10
   1 twenty-one
   1 t(n)=t(n)+b:
   1 t(n)=t(n)+0
   1 s(n)=s(n)+b:
   1 s$=("b(uh)f(or) n(ii)nt(ee)n"
   1 s$="y(ouu)c(ar)ntpl(aa)s(aa)k(ow)nt(er)(dth)(aer)":
   1 s$="welcumt(ouu)(dth)(eh)cass(ee)n(oo)"
   1 s$="ne(ck)stt(ii)my(ouu)w(oo)ntb(ee)s(oo)lu(ck)(ee)"
   1 s$="ne(ck)stt(ii)my(or)ll(ouu)zy(or)(sh)(er)t"
   1 s$="n(oo)m(or)'betspl(ee)z"
   1 s$="h(ow)slimitizwun(th)(ow)zandp(ow)nds":
   1 s$="h(ow)d(ou)y(ouu)wontt(ouu)selekty(or)betspl(aa)y(er)":
   1 s$="(th)(aer)(ar)nten(ee)pl(aa)y(er)z":
   1 s$="(dth)atssinvalid"
   1 roulette  
   1 rd Dozen"'"
   1 n,x;m$;a$;c$(b,n-y-0
   1 h$="12111114221211111424":
   1 h$="111115111511124":
   1 h$+g$="10")+("elev(eh)n"
   1 h$+g$=" 0")+("ten"
   1 g$="9")+("t(ee)n"
   1 g$="8")+("n(ii)n"
   1 g$="7")+("(ay)t"
   1 g$="6")+("sev(eh)n"
   1 g$="5")+("si(ck)s"
   1 g$="4")+("fift(ee)n"
   1 g$="4")+("f(ii)v"
   1 g$="3")+("f(or)t(ee)n"
   1 g$="3")+("f(or)"
   1 g$="2")+("(th)r(ee)"
   1 g$="2")+("(th)(er)t(ee)n"
   1 g$="1")+("twelv"
   1 g$="1")+("t(ouu)"
   1 g$="023023202320330":
   1 g$="0024578995224679:;;7":
   1 cp=cp+st+a*st:
   1 cp;"Capital: `";cp;
   1 _#V)O0G9CC@M@W?bBmEwK
   1 Z$="NO       "
   1 Z$="DONE     "
   1 Z$="00000"(
   1 Y)+("FGH"(1
   1 Twenty-thre
   1 Twenty-seve
   1 Twenty-nin
   1 Twenty-fou
   1 Twenty-fiv
   1 Twenty-eigh
   1 Thirty-thre
   1 Thirty-fou
   1 Thirty-fiv
   1 STYPE=63343
   1 STOP  TAPE
   1 S$=("z(ear)(oo)"
   1 S$=("re(dd)"
   1 S$=("o(dd)"
   1 S$="y(ouu)vnotgotenuff":
   1 S$="y(or)welcumen(ee)t(ii)m"
   1 S$="h(ow)mu(ch)wi(ll)y(ouu)beton(dth)at"
   1 S$="en(ee)m(or)st(aa)ks":
   1 S$="betn(ow)pl(aa)y(er)":
   1 S$="(dth)(oo)zt(ouu)d(oo)ntf(or)m(aa)validblo(ck)":
   1 Roulette  ,
   1 ROULETTE  R@
   1 RED);(" Black"
   1 RED)+("bla(ck)"
   1 Pontoon   d
   1 Pontoon   S
   1 PPic      
   1 O$="P");("19-36"
   1 O$="O");("1-18"
   1 O$="N");("Black"
   1 O$="M");("Red"
   1 O$="L");("Odd"
   1 O$="K"));("Even"
   1 O$="G");("3rd Dozen"
   1 O$="F");("2nd Dozen"
   1 O$="E");("1st Dozen"
   1 O$="D");("6 Numbers "
   1 O$="C");("4 Numbers "
   1 O$="C")+(5
   1 O$="B");("3 Numbers "
   1 O$="A");("2 Numbers "
   1 N(X-(A$="E"),5
   1 N$(Q)=N$(Q+1
   1 N$(IN)=Z$+("B"
   1 MO=MO+TOT:
   1 MASTER ROUTINE
   1 M$(Q)=M$(Q+1
   1 M$(N,Q)-10
   1 Leave tape running"
   1 INPUT=63648
   1 I$="Z")+("N"
   1 I$="Y")+("K"
   1 I$="X")+("J"
   1 I$="W")+("L"
   1 I$="V")+("Q"
   1 I$="R")+("O"
   1 I$="E")+("M"
   1 I$="B")+("P"
   1 I$="4")+("E"
   1 I$="4")+("C"
   1 I$="3")+("I"
   1 I$="3")+("D"
   1 I$="2")+("S"
   1 I$="2")+("H"
   1 I$="2")+("C"
   1 I$="1")+("K"
   1 I$="1")+("G"
   1 I$="1")+("B"
   1 H$="43131484443131318":
   1 H$="2")+("(th)(er)t(ee)"
   1 H$=" ")+("twent(ee)"
   1 H$(NUM)="M");(", Even"
   1 H$(NUM)="M"))+("(ee)v(eh)n"
   1 H$(NUM)="L");:
   1 H$(NUM)="L"))
   1 G$="44343400455555554":
   1 Created with Ramsoft MakeTZX
   1 Casino Royal
   1 Casino    
   1 C$="                                "
   1 Bank has twenty-one
   1 BE;",";BE+1
   1 B$=B$(BY-2
   1 A$=("PLNOMQ"(1
   1 A$="IJK"(Y-1
   1 A 2 3 4 5 6 7 8 9 10J Q K W
   1 =X/2X)=X/2
   1 =(M-M)=(M-N<6
   1 =(M-M)=(M-N<3
   1 ;a$;v$(b):
   1 ;a$;c$(b,n-y-0
   1 ;N1;" is not valid as"'"the start of a block of"'J$
   1 ;J$;" number";("s"
   1 ;C$;"      
   1 ;("1 Number "
   1 ;"from"''"Oxford Computer Publishing Ltd"
   1 ;"```` Welcome to the casino ````":
   1 ;"You've no money left":
   1 ;"You can't put a counter"'"there":
   1 ;"You bet now, ";N$(N,
   1 ;"Who wants to join the table ?":
   1 ;"Use the ";("Kempston"+
   1 ;"Those two don't form a "'"valid block.":
   1 ;"Thanks for the game";
   1 ;"Stake: `";
   1 ;"STOP TAPE";
   1 ;"Press any key                  ":
   1 ;"Pontoon has loaded";
   1 ;"How much will you bet"'"on that"
   1 ;"How do you want to select your  bets ";Z$;" ?"
   1 ;"Enter the 1st number.":
   1 ;"Enter bet: `_   ";
   1 ;"Better luck  next time!":
   1 ;"Any more stakes "'N$(N,
   1 ;"And now the second.  ";
   1 /******((((((((((((((((*********/(((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((
   1 +"clip-on "
   1 *******TOMSTRING*******
   1 *********TCLEAR********
   1 **********INPUT********
   1 **********FULL*********
   1 **********CASH*********
   1 ***********EMPTY*******
   1 *(()(((((((+++++++++++++((((((())((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((*********/(((((((((((((((((******
   1 )="S");("cursor keys or a"+
   1 )="S");("arrow keys or a clip-on "
   1 )="K");("ZX Interface 2 with a "
   1 )="K");("Sinclair"+
   1 )="C");"joystick."'("Use '0' to make choice."
   1 )="C");"joystick"''"All you have to do is position  the cursor over the bet which   you wish to make and press "'("the fire button "
   1 )="C")''"To obain the menu, place the    cursor inside one of the boxes  marked 'MENU'."
   1 );("Nothing"
   1 );(" & after 18"
   1 )+("nothing"
   1 )+("(ar)ft(eh) (ay)t(ee)n"
   1 ));("See your bets so far"
   1 ))*ODD)*WIN+.5
   1 )'"from my memory. Is this O.K. ?"''"Type 'YES' To proceed                'NO' to return to the menu"'':
   1 (.(()//////////((((((((((((((((-((*
   1 (((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((
   1 (((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((
   1 ("Column "
   1 (" & before 19"
   1 ''"Your enjoyment of both programs will be increased by connecting the CURRAH microspeech unit to  the computer. After you connect power back to the computer, typeLOAD """" followed by ENTER."'"Your enjoyment of Roulette will be further increased if the EEC clip-on joystick is attached."
   1 ''"You've won `";AM;" this game.."'''"Next time you won't be so lucky.":
   1 ''"You lost `";-AM''"Just great! You're just the sortof punter we need."''"You're welcome anytime":
   1 ''"Well, ";N$(N,
   1 ''"There aren't any players!":
   1 ''"Press any key when you're ready":
   1 ''"Press    To:-"''"  
   1 ''"No-one came out on tops this    time did they?"''"Next time you'll lose your shirt":
   1 ''"If you don't have these units orthey're already connected, just wait!"
   1 ''"I'm about to erase ";N$(N,
   1 ''"Enter the names of the players. Type 'DONE' when finished."''
   1 '"You've not got enough!":
   1 '"You won ";T$;" ";N$(N,
   1 '"Press   To:-"''"  
   1 '"House limit is `1,000":
   1 &!)///____________//))!&
   1 &!)///____________//()!&
   1 &!))///____________//())!&
   1 &!))(//____________//(()!&
   1 "the '0' key "
   1 "roulette"
   1 "You have bets on the following:-":
   1 "You chose to make your bets by  answering questions which I ask you."''"To make a choice, simply press  the flashing character which    corresponds to the choice which you wish to make."''"A defined bet is one which      involves a stake on more than   six numbers.":
   1 "You chose to make bets using the";("Kempston "
   1 "YES      "
   1 "ROULETTE"
   1 "H";" etc";
   1 "A");" selected"
   1 "  ";BE;(("&"+
   1  to shorten wait."
   1  numbers."
   1  now loaded";
   1  for numbers"'"      
   1  for menu"
   1  for defined bets"'"      
   1  James Hutchby 1984      
   1  August 1982                                         
   1  April 1984        
   1  - PONTOON! - 
   1   is loading"
   1      use the cursor keys or          a clip-on joystick"''"  
   1      use a kempston joystick"
   1      use a joystick with ZX          Interface 2";(
   1      answer simple questions         which I'll ask you"''"  
   1       Return to the wheel"''"  
   1       ROULETTE                       A.J.Parish                     
   1       Pontoon                      James Hutchby                   
   1       Have someone join the           table"
   1       Have a quick course             in betting"''("  
   1       ";("Leave the table"
   1                  !                        !                   !              !         !         !            !   !               !   !          !   !       !       !   !          !   !     !   !     !   !          !   !  !  !   !     !   !          !   !  !  !   !  !  !   !     !   !     !   !  !  !   !     !   !!   !  !  !   !     !   !  !  !   ! !"#$%&'()*+,-./0123456789:;<=>?@AB
   1                                 
   1             
   1